#
# Random drop
#

source common.tcl

set BuffSize [lindex $argv 0]
set seed  [lindex $argv 1]
set queuetype RandomDrop
init $seed $BuffSize
topo
make_traffic
$ns at $SimTime "get_queue; finish"
puts "Running simulation $seed Buff= $BuffSize"
$ns run

